sub EventHeaders
  ifDef #first
    if #first="no"
       return
    endif
  endif
  
  ! table for events and/or for unified event, attribute, residences, and ordinances table
  cell static,local("EVEN")
  set tabwidth 1 alignment center border square
  cellBackground "Table Cell Background"
  set borderColor "Table Cell Background" borderWidth 1

  cell static,"?"
  set tabwidth 1 alignment center border square
  cellBackground "Table Cell Background"
  set borderColor "Table Cell Background" borderWidth 1

  cell static,local("DATE")
  set tabwidth 1 alignment center border square
  cellBackground "Table Cell Background"
  set borderColor "Table Cell Background" borderWidth 1

  hskip -24
  cell LinkButton
  menulink "Sort Events"
  set tabwidth 1 border none image "go-down" imageHeight 12
  help local("Sort the events")

  if #oneTable="yes"
    cell static,local("PLAC")&" "&local("or")&" "&local("Attribute")
  else
    cell static,local("PLAC")
  endif
  set tabwidth 2 alignment center border square
  set width #cellWidth$+5
  cellBackground "Table Cell Background"
  set borderColor "Table Cell Background" borderWidth 1

  newline 1
  #first="no"
endSub